operator(*) Interface

public interface operator(*)

Module Procedures

private function csr_mtx_mult_scalar_1(a, b) result(rst)

Multiplies a CSR matrix by a scalar.

Arguments

Type IntentOptional Attributes Name
class(csr_matrix), intent(in) :: a

The CSR matrix.
real(kind=real64), intent(in) :: b

The scalar.

Return Value type(csr_matrix)

The resulting CSR matrix.

private function csr_mtx_mult_scalar_2(a, b) result(rst)

Multiplies a scalar by a CSR matrix.

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: a

The scalar.
class(csr_matrix), intent(in) :: b

The CSR matrix.

Return Value type(csr_matrix)

The resulting CSR matrix.